? execute patch/merge 



packet 

INPUT 

TIME 

DATE 



78? 

53 

132 3 

76288 



CARDS FROM CRA 
THURSDAY* 10/H/76 



*** MESSAGE OF THE DAY *** 

WELCOME TO B5700 TIME ShARING. 

MAY YOUR DATA RE DEPENDABLE AND YOUR PROGRAMS PROVEN, 
FROM THE STAFF OF THE BIG BAD BURROUGHS, 

*** BURROUGHS B5700 TSMCP MARK XVl.0,69 AND INTRINSKS MARK XVl.0.00 *** 

? EXECUTE PATCH/MERGE 

? FILE LTNE= LINE PRINT 
? DATA CARD 

4!PATCH/MERGE= 2 BQJ 1323 10/12/76 

CDA IN CARDlPATCH/MERGEs 2 

PBDC782 OUT On Li NE : PATCH/MERGE* 2 

DKA OUT SER MASTERF 0000000 J PATCH/MERGE* 2 

OKA OUT SER PATCHDE 0000000 »PATCH/MERGE» 2 

CDA REL CARD:PATCH/MERGE« 2 



B>S7o* ucsc 
fyTctfez to 
siHBoc/LF't-es 



?EN0. 



PATCHDE/0000000/0000000* SEGS--CREATED 10/14/76 AT 00*21 > 11 126 

DKA REl PATCHDE 0000000 * PATCH/MERGE* 2 

PRD07R2 REL On LINE 78 : PATCH/MERGE* 2 

MASTERF/OOOOOOO/OOOOOOOs 300 SEGS--CREATED 10/14/76 AT 13«23»46»42 

DKA REL MASTERF 0000000 « PATCH/MERGE* 2 

PATCH/MERGE- 2*PST» 4 EOj 

PKT#0782 REMOVED 



LABEL OOOOOOOOOLINE 00176288? EXECUTE PATCH/MERGE PATCH /MERGE 

BURROUGHS B-5700 PATCH/MERGE PROGRAM MARK XVI. 0.00 THURSDAY* 10/14/76* 1123 PM, 



********** INPUT *************************************************************************** 

SP CARD CONFLICTS LISTI NONO ZIP 
$. 4 PATCHES FOR LFILES 

CARD INPUT IS CARD 
S* COMPILE XLFlLES/CANOE WITH TSPOL LIBRARY 
S* TSPOL FILE TAPE = SYMBOL/LFRES DISK SERIAL 
S* TSPOL STACK * 1024 
S* TSPOL CORE = 12000 
$* DATA CARD 
$- 

s Reset stuff list set tape single 

S# PATCH 900 FOR LFILES CONTAINS 1 CARD, PRINT FILE DECLARATION C 0900 

Si THE PRINT FILE DECLARATION IS CHANGED TO CD PERMIT OUTPUT EITHER C 0900 

Si DIRECTLY TO THE LINE PRINTER OR TO A PRINTER BACKUP FILE* AND (2) TO C 0900 

•I PROVIDE AN FID FOR THE EXTERNAL FILE NAME. IN THE ABSENCE OF (2)* C 0900 

Si THE INTERNAL FILE NAME = "LPA" DEFAULTS TO BECOME THE FID OF THE C 0900 

*t EXTERNAL FILE NAME* WHICH THEN OVERRIDES THE DEFAULT PRINTER C 0900 

St SELECTION OF THE "UNITQ" OPTION IN TSSMCP. (SEE UCSC PATCH 700 TO C 0900 

St TSSMCP) C 0900 

St BY DR> UCSC* OCT. 13* 1976 C 0900 

FILE OUT LPA 17 "PRINTER" C2*15)> 00010300 C 0900 

St********************************************************************** c 0900 

S# PATCH 901 FOR LFILES CONTAINS 4 CARDS, SINGLE SPACE PRINTED OUTPUT C 0901 

0901 



$1 BY DR* UCSC* OCT, 13* 1976 C uvoi 

ELSE IF PRINTER THEN WRITECLPA* 10* WORK t *1 ) 00028900 C 0901 

IF PRINTER THEN WR I TE CLPA*9* WORK C * ] ) ELSE 00034900 C 0901 

IF PRINTER THEN WRITEC LPA>9* WORKC * ] ) ELSE 00039900 C 

IF PRINTER THEN WRITE CLPA* 9, WORK [* 3 ) ELSE 00040800 " 

Si********************************************************************** 



0901 
C 0901 
C 0901 



S# PATCH 902 FOR LFILES CONTAINS 1 CARD. DEFEAT THE SECURITY CHECK c 0902 



Sf 



st wf may want to rflnstltute some form of security check on a more 
st narrow basis at some later date. 
st compromise between tjp and dr* ucsc, oct, 13* 1976 
securitycheck«-falsf; sdffeat the security check mechanism 

$1****************+***************************************************** 



00028050 



0902 
0902 
0902 
0902 
0902 



S# PATCH 903 FOR LFILFS CONTAINS 2 CARDS. NAMES OF OBJECT FILES 

SI WITHOUT THIS PATCH, LFILES DOES NOT PRINT THE FIRST CHARACTER OF THE 

Si NAME OF AM OBJECT FI|_E, THE CANDE CONVENTION IS THAT THIS CHARACTER 

Si ALWAYS IS A M 0", BUT THOSE FILES WHICH WERE NOT COMPILED THROUGH 

Si CANDE DO NOT NECESSARILY OBEY THIS CONVENTION. THE RESULT IS THAT 

Si THE NAMES OF NONCONFORMING OBJECT FILES ARE PRINTED WITHOUT THE 

S! LEADING (AND SIGNIFICANT) CHARACTER. THIS PATCH ELIMINATES THE TEST 

Si FOR OBJECT FILES, SO THAT ALL CHARACTERS OF THE NAME OF ANY FILE WILL 

$1 BE PRINTED. IT REPRESENTS A CONCESSION ON THE PART OF TOM PENNELLO 

St TO THE DESIRE OF DAN ROSS THAT THE SYSTEM BE SIMPLIFIED WHEREVER 

St POSSIBLE. TOM WANTED TO INSERT AN ADDITIONAL TEST FOR THE LEADING 

SI CHARACTER BEING A "0". 

SI BY DR AND (RELUCTANTLY) TJP, UCSC, OCT, 13, 1976 

S VOIDT 00038101 



C 0903 



* voidt 

$ I *************************************************** ******************* 



00038000 
00038300 



C 

C 

c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 



0903 
0903 
0903 
0903 
0903 
0903 
0903 
0903 
0903 
0903 
0903 
0903 
0903 
0903 



C 0903 



NUMBER OF ERRORS DETECTED ■ 0. 
PROCESSOR TIME a 3 SECONDS, 
I/O TIME * 8 SECONDS. 



LABEL OOOOOOOOOLlNE 00176288? EXECUTE PATCH/MERGE 



PATCH /MERGE 



? COMPILE XLFlLES/CANDE WITH TSPOL LIBRARY 

PACKET 783 

INPUT 16 CARDS FROM ZIP 

TIME 1323 

DATE 76288 THURSDAY/ 10/14/76 



*** MESSAGE OF THE DAY *** 



WELCOME TO B5700 TIME SHARING. 

MAY YOUR OAtA BE DEPENDABLE AND YOUR PROGRAMS 
FROM THE STAFF OF THE BIG BAD BURROUGHS, 



PROVEN. 



*** BURROUGHS B5700 TSMCP MARK XVI. 0.69 AND INTRINSICS MARK XVI.OtOO *** 

? COMPILE XLFILES/CANDE WITH TSPOL LIBRARY 

? TSPOL FILE TAPE* SYMBOL/LF ILES DISK SERIAL 
? TSPOL STACKs 1024 
? TSPOL CORE" 12000 
? DATA CARD 

4:TSP0L/XLFILES* 4 BOJ 1323 08/28/76 

CDB IN CARD DR : TSPOL/XLFILES* 4 

DKA IN SER SYMBOL L7ILES I TSPOL/XLF ILES« 4 

DKA OUT ROM XLFILES CANDEITSPOL/XLFILES" 4 

DKA LOK XLFILES CANOE » TSPOL/XLFlLES* 4 

DKA REL SYMBOL LFILES « TSPOL/XLF lLES« 4 

COB REL CARD DBJTSPOL/XLFILES* 4 



?END. 



TSPOL/XLFILES= 4,PST= 
PKT*0783 REMOVED 



16 EOJ 



■AmcM 



